home *** CD-ROM | disk | FTP | other *** search
/ Mission 1 / Mission 1 / Mission 1.iso / pd_share / cpx_acc / tcache / tcache.s < prev    next >
Encoding:
Text File  |  1994-12-16  |  315 b   |  22 lines
  1. import call_tcache
  2. export do_call_tcache
  3.  
  4. do_call_tcache:
  5.         movem.l D3-D7/A2-A6,saveregs
  6.         move.l  (SP),saveret
  7.         move.l  #myret,(sp)
  8.         move.l    call_tcache(PC),-(sp)
  9.         rts
  10.         
  11. myret:
  12.         movem.l saveregs,D3-D7/A2-A6
  13.         move.l saveret,-(sp)
  14.         rts
  15.         
  16.         BSS
  17. saveregs:
  18.         ds.l    10
  19. saveret:
  20.         ds.l    1
  21.         END
  22.